perm filename T.SCR[M11,LCS] blob
sn#400672 filedate 1978-11-30 generic text, type T, neo UTF8
< T .SCR -- RANDOM NUMBER= 1
PLAY;
TOOT 0.000 0.500 B*2 600.000 F2 F1
;PRINT P1;< TOOT 1
TOOT 0.500 0.500 A*2
;PRINT P1;< TOOT 2
TOOT 1.000 0.250 DS*2
;PRINT P1;< TOOT 3
TOOT 1.250 0.250 CS*2
;PRINT P1;< TOOT 4
TOOT 1.500 0.250 C*4
;PRINT P1;< TOOT 5
TOOT 1.750 0.250 B*2
;PRINT P1;< TOOT 6
TOOT 2.000 0.750 GS*2
;PRINT P1;< TOOT 7
TOOT 2.750 0.250 C*2
;PRINT P1;< TOOT 8
TOOT 3.000 1.000 FS*2
;PRINT P1;< TOOT 9
FINISH; < T .SCR